(describe_map): Fix the call to Fequal.

diff --git a/src/keymap.c b/src/keymap.c
index 222455328a29d3edcfd1995b4471ee5c5bb745b6..7893c2a054a9f91d534e1d2d735ca7406a5bf476 100644 (file)
--- a/src/keymap.c
+++ b/src/keymap.c
@@ -2126,7 +2126,7 @@ describe_map (map, keys, elt_describer, partial, shadow, seen)
             using an inherited keymap.  So skip anything we've already
             encountered.  */
          tem = Fassq (tail, *seen);
-         if (CONSP (tem) && Fequal (XCONS (tem)->car, keys))
+         if (CONSP (tem) && !NILP (Fequal (XCONS (tem)->car, keys)))
            break;
          *seen = Fcons (Fcons (tail, keys), *seen);
        }